instr z=
:s
If z=="стрелять" then if m=2 then m=5 else m=6 else m=rnd4
music rus/#m$.ogg
textfont = "f/s.fnt"
Input z
If m=2 then pause 1000
textfont = "f/z.fnt"
Pln #%z$
goto s


/*140

instr z=
:s
If z=="shoot" then if m=2 then m=5 else m=6 else m=rnd4
music #m$.ogg 
anykey
textfont = "s.fnt"
Input z
If m=2 then pause 1000
textfont = "z.fnt"
Pln #%z$
goto s*/

/*

Примерный текст для озвучки:

1
Зеркальные стены снова повторили мои движения. Я резко повернулся к северному зеркалу. Мое отражение настороженно смотрит мне прямо в зрачки.
Скоро полночь и лунный свет едва освещает четыре стены на которых висят огромные зеркала. Я почти уверен, что за одним из них скрывается мой зловещий брат-близнец, заманивший меня в эту ловушку. Где же он? Что мне делать?


2
Зеркало в точности повторило мои действия. Я повернулся к южному зеркалу. Мое смутное отражение настороженно смотрит на меня, а я на него. Как мой брат, похожий на меня как две капли воды стал таким чудовищем? Почему он убивает людей и пьет их кровь? Зачем заманил меня в ловушку? Сейчас он точно стоит за одним из зеркал и пытается меня одурачить. Что же мне делать?

3
Отражение в зеркале идеально повторило мои движения. Я развернулся к западному зеркалу. В полутемной комнате я едва различаю свое лицо. Или это лицо моего зловещего брата, исчадия ада, кровососущего чудовища? Неужели он повторяет мои движения и ждет подходящего момента, чтобы набросится на меня со спины и выпить мою кровь? Что мне теперь делать?

4
Отражение повторило все мои действия. Как можно быстрее я повернулся к восточному зеркалу. Под полой лапсердака спрятан мой верный пистоль, но в нем всего одна серебрянная пуля. Я могу _стрелять_, но куда! Если бы я только знал за каким из зеркал скрывается мой чудовищный брат! Все что мне сейчас остается, это наблюдать за отражениями в зеркалах надеясь что он сделает ошибку и двигаться, двигаться как можно быстрее. Что же мне делать?

5
Мое счастье, что я заметил как отражение в этом зеркале всегда запаздывает на долю секунды. В мгновение ока я выдернул из под полы лапсердака спрятанный там заговоренный пистоль и выстрелил. Рука не подвела и добротная серебрянная пуля пронзила сердце моего зловещего брата. Больше он не высосет ни капли крови из честных христиан. Победа!

17й век, Румыния, заброшенный замок, полночь. 
Человек в сером лапсердаке выходит из величественных ворот замка, на губах его играет улыбка. 
- Вы свободны, люди, я убил чудовище! - радостно кричит он собравшимся у ворот крестьянам.
- Ага! Вот он, чертов кровопийца, я узнал его подлое лицо! Бей его батогами, ребята! Колья наголо! - кричат крестьяне в ответ.

продолжение следует...

Можете закрыть игру, вы выиграли.
Это победа, закрывайте игру.
И ничего не нажимайте тут. Просто закройте.
Быстро закрыл!
Матива...

6
Мое богатое воображение сыграло со мной дурную шутку. Мне показалось, что человек в зеркале хохочет мне в лицо. Нервы были на пределе, когда я выхватил припрятанный пистоль и выстрелил в собственное отображение. Со звоном брызнули в стороны осколки, комната наполнилась дымом. Я почти не почувствовал как сзади что-то холодное вонзилось в шею. 
Я проиграл. А еще я умер. Но ненадолго... Ха-ха-ха-ха.

продолжение следует...

Ты проиграл, хехе. Ничего больше не нажимай. Просто закрой игру.  
Да проиграл ты уже, лузер, закрой меня. 
Не жми на клавиши!
Хочешь играть заново - закрой и открой снова.
А ну закрой игру!


*/

/*

;137
;Версия без зеркального шрифта с завязкой и временем реакции

instr z=
music "0.ogg"
:s
anykey
m=rnd4
music "#%m$.ogg" 
t = timer
Input z
If timer-t < 99 and m=2 then pause 600
Pln #%z$
If z="shoot" then if m=2 then m=5 else m=6 
goto s


*/


/*
instr z=
music "0.ogg"

:s
anykey
m=rnd4
music "#%m$.ogg" 
Pln YOU TURNED TO MIRROR #m$
Input z
If m=2 then pause 500
textfont = "s.fnt"
Pln #%z$
textfont = "_sysfont"
If z=="shoot" then if m=2 then m=5 else m=6
goto s
*/

/*

instr z=
music "0.ogg"
:s
anykey
m=rnd4
music "#%m$.ogg" 
Pln YOU TURNED TO MIRROR #m$
t = timer
Input z
If timer-t < 99 and m=2 then pause 600
Pln #%z$
If z=="shoot" then if m=2 then m=5 else m=6 else goto s

*/